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IT INTO XIO INSERTING 
TRAILING ZEROES WHERE 
NECESSARY 



NiiL 



PC*PC*2 
D*PC*2 



-JUnp^s-EE 



\i/ 



RI2*RD+B 
D*RO*B 



SLL. 



BO««l2 DATI 
BUF^-UOATA 

-ID SPACE JUnP^4-T 

Di-UOaTA 



JiLl. 



Xie(2)«-BUF 
R12*R12*2 
BUT FD 
j. -junpyH-FF 



JikL 



BA««12 DATI 

BUF4-U0ATA 

-ID SPACE JLTP'H-flA 

D<-UDATA 



1486 



JiLl. 



xie<n*»jF 

R12*(n2*2 



JikL 



H-flS 1876 



BA4«12 OATI 

BUF<-UOATA 

-D SPACE JUnp^-CC 

0*UDATA 



JSLiL 






DM7 



JiLl. 



BA4-PC 

B«-iJOATA 
I SPACE 



JlJ^ 



PC«-PC+2 
0*PC*2 



-junp/^-n 



:J^ 



R12«-RD*B 
D*RO+B 



-junp'"t-jj 



1375 



J^iiL. 



8A«RI2 DATI 

R12«-U0ATA 
—0 SPACE — JunP/^-T 
0*UDATA 



JLl 



:0 



xie< IBKZERO 



D*^2ER0 



-junp'5-c 



Jill. 



X18(8>4«iF 






(test 2ero«i5mI>) 
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(test zero DMg) 

rT4j 



(test zero Biaa) 



1435 



XI24«0TUXtfl) 



IM^ 



9-C 



XieH(OTl.(»*«) 
JWP^9-0 



_iik_ 



F I •♦♦ZERO 
EtH*Et2 
BUT E29T 



0^Et2:2ERO 



-junp/5-F 



FSRC»^ 



F»H*in»0 

Ef^^ElZ 

T^XIZ 

■UT EiBT Y8 



D*X12<B7:B8) 



ROTATE XIO LEFT ONE PLACE 
AND LOAD IT INTO X12 



PLACE EXPONENT OF FSRClNXl* 

WITH LEADING ZEROES. 

TEST FOR UNDEFINED VARIABLE CM-NuS ZERO) 



FSRC-<J 



01 



00 



1096 



5-E 



FOfT.,BUF*FPS 

F*En 

BUT E2BT 0P1A 

junp^ 1 6-0 

D«^PS 



ACH8 
I 



( MUL ACg > 



(I6j 



( DIV AC-g> 
( ADD AC-jT) 
( SUB AC-g) - 



(10} 



(12) 



<- 



Jd.^ 



FDFL .BUF»f PS 
F*EI3 

BUT E28T 0P1A 
JUnP/- 1 6-0 

O^FPS 



1?56 



Jikl 



FDFL.8UF*FPS 
BUT FIUV 



0*FPS 



<- 



FDFL .BUFvfPS 
F»E13 

BUT E2BT 0P1A 
jj%>y 1 6-8 

O^FPS 



(15^ 



(6) 



(6) 



(7) 



{^MOO AC-0) 
■ (CMP AC-0) 

< LP AC-0) 

< LDC AC-g ) 




AC-0 
I 



C SUB > 



doT) 



( MUL FSRC-AC-g ) ^ 
( DIV FSRC-AC-g > 
( ADD FSRC-AC-g > 
(sub FSRC-AC-0> 



(i6) 



(10) 



(12) 



(12) 



JiliL 



Rn*«x 
FEC^-lH 



(37) 



(trap -test) 



AC -a 

9 



(15) 



(8) 



(6) 



( MOD FSRC-AC-g) ( MUL FSRC-g ) - 

(CMP FSRC-AC-g) ( DIV FSRC-gV -^ 

- ( LP FSRC-AC-g ) ( AOOFSRC-g) -^ 



(7) 



^ LPC FSRC-AC-g ) ( SUB FSRC-g ) -^ 



(fS) 



(8) 



(I2)j (6) 



121 (7) 



(mod FSRC-g ) 
{CMP FSRC-g) 
(^ LP FSRC-g) 
( LPC FSRC-0 ) 






U- 






CHKl CHANGtNa 



nzEicooi 



FD 
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-TMt nAW»« AM> *<CVK>''0<. f«KM. AM TM 
P MmH <V OISTM. tO^r- »fT C i a n qM itl tt l M« 

•MIX >or m »pi«m.r.»i ..'■ . wc 31 um m «hou 
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CMKI OMNGiNa 



FSRC-0 



(lD FSRC-AC-g) 

C51 



• 233 



FoMIt 
BUT ENBT 



&»M1«(B7:86> 



-<i) 



>t4- 



IMS 



Jili. 



FCC«-1H<FHF2) 
OJT FO 



-JUrf>/'36-0 



-® 



FSRC>*i3 



(lO FSRC-g) 



(ld acsi) 



(5) 



.SLtL. 



1223 



F^xie 

BUT ENBT 



D«-Xtd<B^:86) 



-JUnP^-0 



-© 



(AC*-Xlg) 



(5) 



JikL 



F«-xie 

BUT ENBT 



04-Xie<B7:B6> 



-JunP/'6-H 



-<D 



lias 



Jiidl 



FCC«-es< F2 ) 
BUT FD 



D^eeeees 



-JUnP-'36-0 



-<D 



'12-13) 



JiiiL 



Fcc«-ee 

BUT FD 



-<D 



•36) 



(store xio) 



— SSS '"Pig"' 



do 



1823 



JAI 



Ft'Xia 

BUT ENBT 



C*X\9iS7:S(,) 



-JUnP^6-H 



JiJd 



t-« 



FCC«-ie<FH) 
BUT FO 



o«^eeeeie 



-JUr»>/'36-0 



^ 



NOTES 

I. TEST SIGN OF FSRC CXI0:8lT 7) 
2 SET FLOATING CONDITION CODES (FCC » 
USING THE APPROPRIATE CONSTANT. 
NOTE THAT THE FCC IS CONTAINED 
IN THE LOWER FOUR BITS OF THE BUFFER (BUF). 
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^-i-l(dd 



lSIa]2 



FSRC-0 



FSRCoa 



(LDC FSRC-ACg) 



12V 



(5) 



(LDC FSRC-g) 



Jil^ 



FCC*«H< FZ > 
BUT FD 



-JUnP^36-F 



-^ 



(LDCAC-g) 



FCC«-8H< FZ ) 
BUT FD 



Q4-0B9||Q*| 



C5) 



CIeD 



F13»2ER0 
E13*E12 
T*X12 
BUT T8 



(>4'Ft2<BI:B8) 



-JUnP/'7-F 



-bk_ 



7-D 



F 13* ZERO 
EI3+EI2 

TK12 

BUT T8 

f JUnP^7-F 

D*F12<BI:Ba> 



t36J 
(STORE zero) 



IN THIS CASE THE FSRC IS ZERO 
SO NO ROUNDING IS NECESSARY 



JikL 



7-E 



SET SIGN 



-JUnPx7-G 



JdiiL 



CLEAR SIGN 



-bid. 



F12«-SR1<FI2) 
E12*ZER0 

JUnP^7-H 

D«-ZER0:FI2<B6) 



i-^se 



JikL 



X12*SRe<X12) 
TBUS*BUF 
BUT FT 

junp^3<i-fl 

0«-BUF 



(round/trunk) 






THIS ROUTINE SETS UP THE FSRC SO THAT 
THE ROUND/TRUNK ROUTINE CAN BE USED 
TO COMPLETE THE OPERATION 



o«l CHANdNg Imv. 
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(0-0) 
(CMP FSRC-AC-g) 



(0-AC) 



(CMP FSRCg) 



(5) 



Jhkl 



1835 



FCC»eH< F2 ) 
BUT FO 



D* OOoWrl 



jik- 



F«-AC.K0R.2M 
8UT ENBT 



D«-teee<» 



-JUnP^36-B 



(36) 



(store zero) 



136) 



(set fcc) 



THE COMPARE INSTRUCTION IS ACCOMPLISHED 
BY SUBTRACTING THE AC FROM THE FSRC AND 
SETTING THE CONDITION COOES ON THE RESULT. 
THIS ALGORITHM FORCES TRIVIAL CASES TO 
FALL OUT AS FOuLOWS: 

1 TEST FOR ZERO OPERANDS 
{8-A.8-8,3-J) 

2 TEST FOR OPPOSITE SIGNS 
(8-l,8-K) 

3 TEST FOR NONEQUAL EXI^ONENTS 
(9-G,9-H) 

4 TEST FRACTIONAL DIFFERENCE 



POSITIVE 
SIGNS 
3<3 



NEGATIVE 
S:GNS 



8-C 



B«-xiH-x)3 siwe 

D4-XI>4-X13<Be:B7) 



cm| avMOiHo. iwf. 



1^*"^' 552 MM ^.^ 



( CMP ) 



1829 



(5) 

n1/ 



(FSPC-01 
(CMP AC-g) 



0»<F12«E«C) 

JUnP-'B-L 

D*EAC:P 12(86) 



JbkL 



a-L 



F12*SR1(FI2) 
E12*2ER0 

JUnP^B-n 

l>»eER0:F12tB6> 



^^ 



X12*SR0<X12) 



I>*XI2(B7:B6) 



J^^ 



BUT ENBT TO 



D»0CB7:Be) 



SAVE SIGNS OF AC 
AND FSRC IN ()REG 



INSERT HIDDEN BIT 
ZERO EXPONENT FIELD 



INSERT GUARD BIT 



GATED ONTO F BUS 
TEST SIGNS 



1225 



> J / 



F«-X18 
BUT EN8T 



D«-xie<B;':e6) 



(SETFCC) 



FSROAC 
10 



FSRC < AC 
01 



JiiiL 



0*X1 1(B7:B6) 



Jii^ 



XI i*xi2 



l>*X12(B7:66) 



1340 



-bJLL. 



fl-G 



XI2<-XI0 



-junP''8-H 



d«-xi0(B7:b6) 



1455 



::iiL 



8-1 



Fcc*ee 



-junp/36- 1 



J^k 



FCC*ie<FM) 

o^eeeete 



-jur*y^6-i 



Jill. 



8*XI3-XI4 SWAB 
junp/ 9-A 

D*-XI3-XI4(B0:B7) 



> SWAP AC AND FSRC 
FOR THE FOLLOWING REASON 
C(-FSRC)-(-AC))»AC -FSRC 



I COMPUTE EXPONENT 
I DIFFERENCE 



( f SERV ) 









C9) 



(test exp) 
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TITU 

FPII-F-FLOWS 
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imcu 
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aar« 



FSRC<AC 

10 



-iJdL 



FCC*1BtFN> 

«jnp^36 -r 

CKaeeeie 



(fserv) 



10 



FCC*ie<FN> 



JUnP^ 36-1 



(test exp) 

(8) 



Jik 



T«-e 

BUT MBIT 2aiT 
JU*>^9-H 

04« 



91 



Jill 



GATE B ONTO T BUS 

TEST EXPONENT DIFFERENCE 



9-C 



X12*X!2-X11 

JUMP ,'9-1 

OX12-X1 1(8^:86) 



J^ 



SUBTRACT FRACTIONS 



F*xia 

8UT XNST X28T 

JUnP/9-F 

D*X12< 87:86) 



^1 



_^ 



GATE X'.2 ONTO F BUS 

TEST FRACTIONAL DIFFERENCE 



FCC*0«f<F2> 



o+eeeeen 



(serT) 



Z-d-ndd pAQ 2 

_S£S itaSlanl 



FSRC<AC 



tt 



leie 


\/ ^" 


pcc*«e 
" "5*?lRb~ 


Jtrip>'36-i 



(fserv ) 



JiAl 



9-F 



FCC«-9e 
"CKfERO" 



Junp^ib-L 



TITU 
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FD 



FPll-F-2 

ri I M 
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B 
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z-i-iidj lojiai 2 



1236 



(^D1VAC-FSRC = C') 

IT?) 
n1/ 



1036 



R1 »«-ex 



D*^BX 



(div fsrc=») 

(5) 

ili 



le-B 



R11»BX 
FEC*eH 



DIVIDE BY ZERO IS UNDEFINED '^ 
AND THEREFORE CAUSES THE TRAP 
PATH TO BE TAKEN 



(37) 



(trap test) 



(DIVAC = ^) 



FCC*8H( f2 ) 
BUT FO 



IF THE DIVIDEND IS 

ZERO AND THE DIVISOR 

IS NONZERO THEN THE (STORE ZERO) 

QUOTIENT IS ZERO 



, INTERRUPT PENDING 



CORRECT PC 
BUT ON SU0-T 



JSLL 



PC*PC-2 
BUT SRC 



-JUnP^2«-A 



(29) 



(correct^ 



ChO 



(5) 



Jikl 



xn»xi3-xit 

R14*(72.32) 

junp^ie-E 

o«-ee8e72. 800032 



J5li. 



XI 3«-X1 3*200 



jikL 



Q*2ER0 
0»2ERO 



-JUnP^10-F 



-iiiL 



F12*SR1<F12) 
E12*2ERO 

JUMP^IB-S 

0*2ERO:PI2<B6) 



JiiL 



Xi2*SRe<Xl2) 
BUT BR.OR.PFfllL 

junp-'i e-H 

D*X12<B7:B6) 



1436 



JiLl. 



Xie^^ROTUZERO 

■<EAC.XOR.Eie>> 

junp^i I -A 

D«€AC.X0R.Eie:2ER0 



( DIV- LOOP) 



SUBTRACT EXPONENTS 
SETUP ITERATION COUNT 



ADJUST EXPONENT BIAS 



ZERO QUOTIENT ACCUMULATOR 



INSERT HIDDEN BIT 
ZERO EXPONENT FIELD 



INSERT GUARD BIT 

TEST FOR INTERRUPTS OH PFAl 



XK>— SKN OF QUOTIENT 



X.0 I ZERO \sr///A 



r 



1g 

go 
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FD 



FPll-F-2 



B 



I Ta/ 
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1 



2 -J- 1 Id J 



Q^Ol 2 

llWlTfl 



Cdiv-looF) 



10 



^ 



1179 



(1^) 



90 



11- 



xii«SL«(xn-xi2> 

II1«m4I1<«-1 

lUT CaUT63 2BIT 

jur#^n-« 



n- 



XIUSLKXIZ^KII > 

0«-SLC63<0) 

R1«t*HJH-l 

MJT CQUT63 2BIT 

JU9/1 1-fl 

0*<1<«-1 



SLL 



01 



11-C 



xi2«-s).a<0) 

BUT T6I 



D*0(M:K> 



-JUHP^I 1 -f 



THIS IS A NONRESTORING 
DIVISION ALGORnHM IN which; 
I. THE DIVISOR IS SUBTRACTED FROM THE 

DIVIDEND IF THE LAST QUOTIENT BIT 

(C0UT63) WAS ONE. 
2. THE DIVISOR IS AOOEO TO THE DIVIDEND 

IF THE LAST QUOTIENT BIT CC0UT63) 

WAS ZERO. 



-ik_ 



11-0 



xie«-SL*(0> 

BUT TS1 



D*«(89sBGi> 



-JUr»^11-f 



11-E 



XI3«X13«I 

TBUS<«r 
BUT FT 

junp^34-« 



-ilC 



XIZ^SLKXIZ) 
TBUS^BUF 
BUT FT 

JUnP^3H-A 

l>*BUF 



QUOTIENT = 



(34) 



DIVIDEND 
DIVISOR 



AC 
FSRC 



Xil 

xiz 



ko 



t 



U. 



(rounq^ruwk) 



^ 



aar* 
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FPI 
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£jJ__^Tid£^M[2| 



(SU8 FSRC-AC-0) 
(5) 



FCC*eH<P2> 
BUT FD 



D+eeeees 



-JUnP''36-F 



(add FSRC-AC-0) 
(5) 

\1/ 



FCC*8^<FH) 
BUT FO 



-JUnP^36-F 



(sub fsrc^ 

4^ 



(add FSRC^i) 
(51 



F*AC 
BUT CNBT 



0«-AC<87:S6> 



F«-«C 
BUT ENBT- 



D<-M:(8;':a6) 



-JUf1P'''36-B 



(sub AC-g) 



(add AC'g) 



1222 



F10*Fie 

Eie»Eie.xoR.2ee 

BUT ENBT 
JUnP^6-H 



:iikL 



F*X18 
BUT ENBT 



D<-Xie<B7:B6) 



-Jur»'6-H 



(36) 



(36) 



(store zero) 



(SETFCC) 



i6i 



(AC'-Xlg) 



ADO AND SUBTRACT HAVE THE FORM AC+-AC1FSRC 
OPERATIONS FALL INTO FOUR CATAGORIES 

1. BOTH OPERANDS ARE ZERO CI2-A.I2-B) 

AC«-ZERO 

2. FSRC IS ZERO (I2-C.I2-DJ 

AC --AC 

3. AC IS ZERO <l2-£ i2-F) 

AC-FSRC (ADO) 
AC«- -FSRC CSUB) 

4. NEITHER OPERAND IS ZERO ( l2-0 l2-I» 

IN SUBTRACT, THE SIGN OF THE FSRC 
IS COMPLEMENTED (I2-G,I2I) AND THE 
ADO FLOWS ARE ENTEREO/ia-j; 



Rir HOLDS THE MAXIMUM 

ALIGNMENT COUNT 

57 -DOUBLE 25 -SINGLE 



iNTE-RRUPT PENDING 



RESTORE INDEX 
CONSTANT 



Jiki 



B«-< 18. '♦.2) 
JUf1P/19-J 

Dt-eeee 1 . 88eee>4 . eeeeaa 



(19) 



(PC*-PC -2) 



( SUB ) 
(5) 

\1/ 



1 2-6 



F19<i-Fie 

Ete«-Eie.)(Q«.2e8 

JUnP/'12-H 



Jik_ 



X12*R0TL<Xie) 

junPz-is-i 

D*Xie<B7:B6) 



1822 



JiikL 



0<-( F ! 2«EAC ) 
Rii3»<7l .31 ) 

juMPxia-j 

D<-0O0e7i .ee003t 



_iJ^ 



( ADD ) 



(5) 



12- J 



B<-X1>i-X13 SUAB 
BUT 8R.0R.PFAIL 

jLinP^i2-K 

D«-Xm-X!3<B0:B7) 



SAVE SIGNS OF 
FSRC AND AC IN Q 



SUBTRACT EXPONENTS 
TEST FOR INTERRUPTS 
OR PF»1L 



.2^ 



F12«-SRUF12) 

E12*2ER0 

RIH^B 

BUT MBIT 2BIT 

-JUnP^13-I 

0*8 



INSERT HIDDEN BIT 

ZERO EXPONENT FIELD 

TEST EXPONENT DIFFERENCE 



1° 



(13) 



(augn) 



CHKl CH»wMwa luv. 



Star- 
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E(AC)-E(FSBC) 

■ NO ALIGNMENT 



£(AC)>£(FSRC) 
ALIGN FSRC 



01 



X12«-SR0<X12) 



D«-X12(B7:B6) 



INSERT GUARD BIT 



01 



JikL 



F*AC 
BUT EN8T 



D«-AC(B7:B6) 



1013 



(SETFCC) 



J^Ld. 



FvOC 
BUT ENBT 



D«-flC(B7:B6) 



(36) 



(set fcc) 



IN BLOCKS 13-0 AND 13-L, THE EXPONENT DIFFERENCE 
C8 0RRI4)IS COMPARED TO THE MAXIMUM ALIGNMENT 
COUNT (RI7) TO SEE IF THE ALIGNMENT IS WITHIN BOUNDS 
AN ALIGNMENT OF MORE THAN 57/25 MEANS THAT THE 
CORRESPONDING OPERAND VANISHES ( 13-B, I3-C,l3-H). 
ALIGNMENT OF FSRC TAKES PLACE IN (I3-E,l3-G) 
ALIGNMENT OF AC TAKES PLACE IN (13-J) 



cwc| CHANctNg Imv. 




XI2*5Re<Xl2) 

T«-Rlfi!+B 

BUT NeiT 2BIT 

XmP/'l 3-E 

D*R17+B 



INSERT GUARD BIT 
TEST ALIGNMENT 
MAGNITUDE 



m 



Jiif- 



X12*SRe<X12) 
RIH^-RIH+l 
BUT 2BIT 



J^ 



Ji>kL 



X12«-SRe<X12) 
RlHt-RlH+l 
BUT 2B!T 



e 



F«-Q 

BUT ENBT T8 



D«-0<87:Be) 



NOTE. Y8-SIGN OF FSRC 
ENBT- SIGN OF AC 



T-i-lldJ 



Odla] 2 I 



EfACX ECFSRC) 
ALIGN AC "^ 



PUT EXPONENT INTO Xl3 
B«- ALIGNMENT COUNT 



INSERT GUARD BIT 
TEST Aa&NMENT 

MAGHnuDE 



1015 


1 


13-H 


F<-X1& 
BUT EK8T 




-H 


0*XI8<B7 


%) 



(AC*-Xi0) 



(ado-sub) 



TITU 

FPII-F-FLOWS 



00 



-iJ>d. 



1 3-1 



X13«-X14 
B«-R10 



D*R^C 



-JUnPx13-L 



JiA^ 



13-L 



X12<-SRe<X12) 
T«-R14-B 
BUT N81T 



Nl/- 



^ 



xn«-sR0<xii ) 

RI^^HIH-l 
BUT 281 T 



:ikL. 



BUT ENBT T8 



D4-Q<87:Be> 



(I3J 
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FD 



NUMtfR 

FPii-r-2 



n 



r// 



icn 



CM 

a 

Ll. 

TLl 



-TWI OCAWVC AND 9tOK*TOa. HUM. Mt THI 

mawrr or votm. nww mu T oowoaATUH mho 

atrtu. >er M MMODUOD 0* COMB at USD M WMOU 
OB M nXT M THI lASa POK TW MMtUHCTUM ailMl 

V mm wrnouT wuTTM pvutnaoN. 

DWTM. Nufanairr cawouTor 



wrnouTi 
IT© 



SU8 



(add -sub) 

(13) 



10 



0! 



:iAiL 



xi2«-xi2-xn 

0*X12-X1KB7:e6) 



Jikl. 



xi2*-xn-x!2 
0*X11-XI2<B?:96) 



JiJ^ 



F«-X12 

BUT XNBT XZBT 

JUnP/14-0 

D*-XT2<B7:86) 



01 



:ik_ 



FCC*e4<F2) 
BUT FD 



(36) 



( STORE ZER^ 



00 



Jik_ 



CLEfl*! SIGN 
T«-X12 
BUT T62 



0*X 12(65:96) 



:^ 



X14«-R14 
D*R1H 



-JL»1P^14-I - 



^ikL 



X13«-X13+X14 
TBUS*BUF 
BUT FT 



(34) 



(round/ trunk) 



_ii^ 



SET SIGN 

D<-ieeee0 



J^i^ 



Xi2<--Xi2 

junP/-i4-R 

D«--xta(B7;96) 



J^lil 



F<-X12 
BUT Y62 



D«-X12(B5:B6) 



(normalize) 



(19) 



XZBT-O 



\^ 



^ 



\^ 



ALd. 



X12»SL8<X12) 

R14«-R14-1 
BUT T61 



Jik_ 



R14+R1H SUAB 



0»R14 SUA8 



-junp^i4-p 



E- J- (Id J laja 



ADO 



00 



:ik_ 



SET SIGN 



jikL 



CLEFlR SIGN 



:d<£. 



Xi2«-Xl2*xi 1 

junp^iH-s 

0<-XI2*X1 I<B7:96) 



Jiil. 



P«-X'2 
BUT XNBT 



D«-Xi2<87.96; 



jy^ 



Xi2<-SR6<xi2) 



D'-Xi2<B7:96) 



Jid. 



x'3«-xn*i 

TBUS«-Bt#^ 
BUT FT 



TBUS»-BUF 
BUT FT 



(34) 



(round/ trunk) (round/ trunk) 



1^ 









CMK I CHANGE NO. I MV. 



rrru 

FPII-F-FLOWS ^''^) 

SCAU -» ^ [SMCET ]?» 40" 



FD 



NUMttN 

FPil-F-2 



-TMt DUWMC <»e snCriCATIONl HBttM. AU TMi 

nofornr of omitai. nuMie^r comATON Ate 

WML NOT ■ MTMOUOD at cons a USBMWHOU 

0* n Nwr A( na •*» k» tmi manivactuii ok wu 



2^;lldJ IQJa 



Cmod FSRC=AC = ) 



1231 



\/ 



(MQDFSPC^e ) 



(5) 



Fcc*eH< Fa ) 

BUT FD 



D«^0eeees 



-Jilr#>>'i5-E 



J:ik: 



f5) 



FCC*eS(F2) 
BUT FD 



(store zero twice") 



-^ 



I DOUBLE 



INTEGER 
ZERO 



^^ 



( MOD AC^g ) 



J^ 



(5) 



( MOD ) 



«M:*eH< F2 ) 

BUT FD 



SINGLE 



flC.0R.1«-cER0 



D«-2ER0 



-JUt1P-'36-E 



flC.0R.toaH2ER0 

J|jnp^36-F 

D*2ER0 



(36J 

(store zero double ) 



(36) 
( STORE ZERO SINGLE") 



IN THIS CASE, BOTH FRACTION AND INTEGER 
ARE ZERO f SINCE THE PRODUCT IS ZERO) 



j:J/ 



X13«-X!3*X1H 
R1H*(7e.38) 
JUnp^l6-E 

D<-e0e879.890a3e 



ADO EXPONENTS 

SETUP ITERAHON COUNT 

ENTER MUL FLOWS 



( ENTER- MUl") 



THIS INSTRUCTION GENERATES THE PRODUCT OF ITS 
TWO FLOATING POINT OPERANDS, SEPARATES THE PRODUCT 
INTO INTEGER AND FRACTIONAL PARTS AND THEN STORES 
BOTH PARTS AS NORMALIZED FLOATING POINT NUMBERS. 
FOR EXAMPLE, IF 

PRODUCT =.111 iOOOlll X Z^ 



THEN 



INTEGER = 
FRACTION 



.11 I 1000000 X 2* 
= .0000000111 X 2^ 



THE INTEGER IS STORED IN THE AC y I . THE FRACTION. 
AFTER BEING NORMALIZED, IS STORED IN THE AC. 
NOTE THAT IF THE AC IS AN ODD REGISTER, THE INTEGER 
IS OVER-WRITTEN BY THE FRACTION. 



,'^J 






sQ 



iSI 



OMNKNa MV. 



aar- 



TriLi 

FPII-F FLOWS 



(15) 
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FD 



FPI 



mumtn 

F 2 



JJ 



-THIS DKAonMS <V« IMUKATOa, tWK XM TM 

PKMHTY or oierrM. tguiMimT oomvoaton a>« 

BULL MOT M UPWOUCB OK COMB OH USD H WHXi 

at M rMT Ai THC tun kx tw wAMUTAcrun o* wu 
or ma witoout wiuttih pouusiok 
cnrtmeMT© o>errM.iifMimn<s»K»*.vt»r 



(MUL FSRC=AC=0) 
C5) 



(mul FSRC-0) 
(5) 



Jik_ 



FCC«-8H< F2 ) 
BUT FO 



(mul AC.0) 
(5) 



JiJiL 



FCC*e4(FH) 
BUT FD 



J^ 



FCC*a^(F2> 
BUT FD 



(enter-muT ) 

(15) 



PRODUCT IS ZERO 



2-j-iidJ lajjal 2 I 

m».»» MBP at I 



INTERRUPT PENDING 



CORRECT PC 
BUT ON SM0-7 



JiiL. 



PC«-PC-2 
BUT SRC 



(36) 
CSTORE ZERO') 



(correct) 



( MUL ) 
(5) 



Akl 



xn'-xn+xi'* 

R14<-( 78.30) 
JUnP^16-E 

D«-000e7e.00e0'3e 



-^ 



^Id. 



xi3*xn-a00 



J^ 



F12*SR!<F12) 
E15<-gER0 

JUnP/16-G 

D»2ERO:Cia(B6) 



J^ 



D«-X!2<87;86) 



_^kL 



X10«-ROTL<2ERO 

«!<EfiC.xOR.E'9)> 
BUT BR.OR.PFftiL 

JUnP^16-I 

0«-EAC. XOR . E 1 : 2ER0 



likL 



Cmul-loop) 



ADD EXPONENTS 

SET UP ITERATION COUNT 



ADJUST EXPONENT BIAS 



INSERT HIDDEN BIT 
ZERO EXPONENT FIELD 



PUT MULTIPLIER INTO Q REG 



XI0*— SIGN OF PRODUCT 

TEST FOR INTERRUPTS OR PFAIL 



ZERO PARTIAL PRODUCT 



CL 






CHK I CHANGi Na I HV. 



TITU 

FPII-F FLOWS 



(16) 



ISMItT 



!90f 40 



SIZECOOf 

D FD 



FPII-F-2 



-yy 



-ne B«Aw»s t^ v«ancATie»& iw m «■■ -nc 
m>Ti or a«(T«i. nummr ooM>o*ATiaM *•• 
>Mj. HOT H onoouon (M csrm 0* uMD M mou 

0* H MKT Al n« •*■> lO TW IMMWACnM Oi IMI 



( mul loop) 



(16) 



JiiL 



X12»SRe(XlS) 

BUT <Qe.Qse> 



0*X12<B7:B6) 



-ass:: _Jasu~ 



\^00 



_iJ^ 



X12»SRe<X12) 
BUT <Q8.0He> 



(HR1H-1 



MOO 



1849 



17-e 



Ki««-si.e<xi2> 

JUtf -' 1 7-6 

D4-Xl2<B;^iM> 



nI 



X13*XI3-1 

junpxi7-i 

0«xn-1<B7:B6> 



TEST 
EXPONENT 






IHH* 




-^ 



^TV 



F4-X12 

BUT T62 OPIfl 



D«-X12<B9:B6) 



-JUnP/17-F 



-^ 



(roundArunk test^ 

(30) 



N/ 



JiiLl. 



I7-I 



F«-X13 

•UT E2BT T9 T8 
jjTP, 1 a-p 

0«-X13<B7:8e) 



Jik 



^^ 



TBU5*BUF 
BUT FT 



17- J 



-JLrP^3M-A 



CIS) 



Cm CD -test) 



(34) 

(round/trunk) 



10 ^/ 



9 



_iii. 



X12*SR9<X1 1+X12) 

o<-SRe<0) 

R1S<-RlH-t 

BUT (08.040) 26IT 

JUnP^17-fl 

D^RIt-l 



:^ 



X12»SL»(X12) 



[>«^X12<B7:B6) 



-JUrf>-'l7-H 



^il_ 



X13*Xt3-I 

junp>'i7-j 

(>*X13-KB7iB6) 



TEST FT STATUS 
BIT (YSn 



ALL SHIFTING IS DONE 
WHEN WE DROP OUT OF 
THIS LOOP LEFT GARO 
BH IS ZERO 



TEST MSB OF PRODUCT TO 
SEE IF PRE-NORMTLIZATTON 
IS HESCESSARY. ALSO BREAK 
OUT MUL AND MOO INTO SEPARATE 
FLOWS- 



SHIFT PRODUCT LEFT ONE PLACE 



DECREMENT EXPONENT 



CL 

U. 



0«| OMNQi MX TuiV. 



itziEooi 

DFD 



TfTU 

FPII-F-FLOWS fi''> 
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FPII-F-2 



ET 



> »» Ti or vmrti. tQum m a cowawTai *md 



^• 



idJiOdiai 2 



EXP< -127 



EXP>+I27 



(mod -test) 



-i28<£XP<+<28 



LOAD UNBIASED EXPONENT 
INTO XI4 AND TEST 



EXP>« 
09 




THE ROUND/TRUNK ROUTINE 
WILL STORE THE FRACTION 
AND UPDATE FEA AND FEC 
IF NECESSARY 



Xil-^-(56 OR 24) 
IN BASE TEN 

56 FOR DOUBLE PRECISION 
24 FOR SINGLE PRECISBJN 



!i 



go 



5 



(trap test) 



CHK| CHWgiNa itrf. 



«ap- 



TITU 

FPII-F-FLOWS 



(18) 



IDrDl FPII-F-2 



IIHHT 21 0* 40 



tw 



OB M PMn AS TM (US W* TX 

w rriMi wroeuT wu 



iwMiMciwa oi awf 



(test EXP moo) 
(18) 

ili 



R144-X11 SUA8 



0«-X1UBe:B7> 



INDICATES THAT FRACTION 
IS ZERO 



24-v 



EXPXip 



_iiki 



19-C 



X124-SLe<X12> 

T^ftlH 

BUT NBIT 



nw 



GET LOWER SIXTEEN 
BITS OF XII INTO RI4 



DUMP GUARD BIT 
TEST EXPONENT 



sll 



F12*SLe<F12> 
EI2*E>3 
junpr 1 9-E 

l>*E13:Ft2<B6> 



JJ^ 



>C124«OTR<<F1t.0R.FI2> 

■E12> 
FCC«*t<FZ> 
BUT FO 

jijnp^i9-6 



1139 



DUMP HIDDEN BIT 
INSERT EXPONENT 



INSERT SIGN AND ROTATE RIGHT 
SET CONDITION COOES 



Jii«^ 



19-1. 



I>«-X12<B7;B6) 



-junp^i»-n 



-iid. 



X1H«^Xn .ANO.XtH 

junp/'H-N 

OXn .0»«.X12<8^:B6> 



:iJ^ 



«9-F 



113H 



AC.0R.1»XI2 



D<-Xt2<B7:BG> 



-JUnp/'36-E 



JiJ^ 



AC.0R.K32HX12 

xnP^%-F 

0«Xt2<S7:B6> 



(3«1 



(store zero double) 



STORE 
INTEGER 



FlH^SLacFlt) 

E1H*€13 

BUT BK.OR.PFAIL 

junp^i 9-0 

1>«€13:P1H<»6> 



I INTERRUPT PENDING 



06) 



(store zero single) 



JikL 



^C»PC-2 
BUT SRC 



tXW-2 



-Junp^2«-« 



JikL 



xm*«0TR<CF1f.0lt.FI>t> 

ieiH> 

BUT FO 

junp/- 1 9-0 

D*€l>t:riB.0R.FIH<86) 



(20) 



THIS IS HOW THE MASK (XII) IS USED 

TO SEPARATE THE FRACTION AND INTEGER 



(correct) 



XII r 


ONES 1 ZEROS 1 


AND 


XI4| 


PRODUCT 1 






xi4r 


T 1 ZEROS 1 



Xlll 


ONES 1 ZEROS 1 


AND 


xiaf 


PWOOUCT 1 






xizf 


ZEROS 1 F 1 



where: 



I -INTEGER PART 
F -FRACTION PART 



Jii^ 



OC.0R.t*-XI4 



D«'X1H<B7:B6> 



-JUW»'19-« 



19-« 



AC.(X.U32>4-X1H 

Xf1P>'t9-l» 

D^XIiKB^sW) 



STORE 
INTEGER 



2-j-iidJ laJai 2 I 

— »* mawt I 



HERE WE FINALLY GET TO A 
NON-TRIVIAL CASE. A MASK IS 
GENERATED IN XII WHICH WIU 
ALLOW THE INTEGER AND FRACTION 
TO BE SEPARATED. 



I<EXP<(|J) 



IKS 



_i^ 



19-H 



XlltZERO 

BUT BR.OR.PFAIL 

junp^i9-l 

04-2ER0 



INITILIZE XII 



(PC-PC-2) 



INTERRUPT PENDING 



J^^ 



RtH^XIt SUAl 



C>«^X1>t<Ba:K'> 



Jbkl 



RI4 
GETS EXP 



(12) 



1 9- J 



PC*PC-2 
BUT SAC 



xiii-SRUxn } 
R1H*»1H-1 
BUT 2SIT 



0«*1t-I 



CORRECT 
PC 



(20) 



(correct) 



IN THIS LOOP 2 



EXP 



ONES ARE PUSHED INTO XII 



X12«-SRe( XIIBM .WO .X12 ) 
JUnPx 1 9-U 

04-XnBAR .QHD .Xt2< e;^: B6 > 



N/_ 



F12*F12 
E12«€l2.AW.36a 

BUT X2BT 

junp/'i*f-e 



GENERATE FRACTION AND 
INSERT GUARD BIT 



MASK OF IRRELEVANT BITS 
TEST FOR 2ER0NESS 



JiAl. 



(14) 



FCC»«H<F2) 
BUT FO 



(normalize) 



(store zero) 



a. 



iCi 



CHK| CMAHSINa 



FPII-F-FLOWS (!9) 
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FD 



FPll-f -2 



I I I I I I I r 



u 



1 



wjfi ii or oaiTM. touKtm n ~ 
>««u.N(mii 



wcDaur 
^7 



977 



2- J-lldJ 






OMO 



DMI 



DM4 



DM2 



'756 



ik- 



S£RV(BR.OR.PFAIL> 

JUnP/'29-Q 

D»Xt0<B7:M> 



JiiL. 



2e-8 1792 



RO»RO*B 
O*f?0+B 




DM3 



_^AiL 



se-S 1753 



RO*RO-B 

sw a — 

0«-RO-B 



-juip^aa-p 



\1/ 



^ 



0M5 



_sj^ 



ZB-l tTW 



Rt>*R0-8 
SERVCBR.Ofi.PFfllL) 

SRI i JUnP^2e-Q 

D«-R0-2 



.^iiL 



S£RV(BR.OR.PPflIL) 

JUnP-'2a-Q 

0*Xie<B7:B6) ' 



^^ 



DM6 



DM7 



JikL 



2e-^i I7W, 



Rt>*«>*2 
SCRV(8S.0R.PFAIL> 

SRI E Jirt>y29-Q 

0*«>*2 



:ikL 



a«-*« 17V 



PC*PC-2 
S€RV(9fi.0R.PFAlL) 

JUnP'2»-Q 

D*PC-2 



:ikL 



PC*«:-2 

SERV<BR.OR.PfAIL> 

junp^ae-o 

0*PC-Z 



THIS ROUTINE IS USED TO RESTORE 
ALL REGISTERS TO THEIR 5'ATE PRIOR 
TO THE EXECUTION -OF THE LNSTRUCTION 
THAT IS BEING ABORTED- 



Si/L 



Rl5*-U0ATA 

BliT 5ERVCBR.0R.PFA1L) 



fc-KDII-Z ) 



^ 



(fetch) 



(26-KDIl-Z ) 



\Z 



a. 

E 

go 



J^ 



( TRAP ) 



THE TRAP PATH WILL NORMALLY BE 

TAKEN UNLESS A QUIRK BR IS ENCOUNTERED 

(A BR THAT IS ASSERTED A/WO TtfEi/ V£&Areo 

Be POKE rue Fnoc ESSOIN issues A 86^ 



CHK I CHM4GC Na I MV. 



«nr 



TITU 

FPII---FLOWD 



(ZO^ 



fw^ET 23 » 40 



d|fd 



FPi 



NUHM* 

-F-2 



I 1 I I I I I I 



n- 



1 



-TMB MAWME M« 

■■ >T i' or oaiTM. •gunHMT 
sou. NOT •■ nvweuaD 0* 



V«CVICATa& I —11. AM TM 



■^^7""* 



?-j-iidj jojai 2 I 



Cfdst-clr^ 



i77e 



(fost- dnf) 



JiLi. 



X114-2ER0 
CLEM? FLAG 
BUT FOST 



-JUnP^21-T 



HERE THE NEXT ADDRESS 
WAS PICKED TO INHIBIT THE 
NORMAL OPERATION OF 
BUT FOST 



JJ,^ 



21-T 1617 



FCC«-a4< F2 ) 
BUT FDST 



-JUnP^2?-B 



JiLL 



R1K-6X 
FEC«-e2 



J^ 



THIS ROUTINE FETCHES THE UPPER SIXTEEN BITS 
OF THE FLOATING DESTINATION WITHOUT INCREMENTING/ 
DECREMENTING ANY INDEX POINTERS. THE INDEX UPDATE 
IS DONE BY FDST MOOES OR SPECIAL DEST 



Rta«-2 
BUT FOST 



D<-eeee82 



ILLG 



DM«_ 



M/ 



21-C 



R1 K-8X 
FEC*e2 



(27) 
( FDST mooes) 

QMI 



(37) 

C illegal) 



0M2 



:^ 



21-0 i;'22 



BA.R12<-RD 

ID SPACE 



-JUnP^21-L 



1720 



DM4 



-^Id. 



21 -E t72H 



BA,R12*RD 

ID_S_PAC.E., 
0*R0 



— JUnP/'21-AA 



DM3 



Jd^ 



21-6 1723 



R12«-R0-B 



21-F 



CW^DST 



JUMP/2I-V 



\/_ 



2hAA 



DAT I 
BUF<- UDATA 
MAINT 
JUMP'21-M 



(371 



(illegal) 



jiik. 



XI 0*^0 



0<-0<B7:86> 



-XinP/'22-fl 



0«l CWNMHOi Imv. 



QMS 



^. 



2'-H 172^ 



B««-RO OflTI 

R)?HK>aTfl 

10 iF-»C£ 

junp^2, .L 

04-UOATO 



DM7 



J^kL 



21-0 1727 



R12«-(?0-2 



-JUnP^21-U 



DM6 



21-S 1736 



Bfi«-PC 
8<-U0ATA 
I SPACE 
BUT GR7 



D«-UO«TA 



JiskL 



\/, 



^ 



I9H5 



J^ 



^ 



BA*PC 
B4-UDATA 
I SPACE 
BUT SH7 

0<-UDATfi 



--JUnP^21-R 



1736 



^k. 



B«-B*«10 
0<^*R10 



-JUnPx2i-R 



21-T 17>f 



R12*'R0>8 



O^RO^^B 



15H6 



^ 



Jik: 



\/« 



0«HW>*8 



-JUnP^21-L 



J^^ 



21 -U 



»H-R12 0«TI 

R12HJ0flTA 

10 Sf\.E JUnP^21-L 

D4-UDATA 



J:>Ll. 



21 -L 



BAtR12 OATI 

8UFHJ0ATA 

HAINT 

10 swscE junP/21-n 

0«-UOATA 



JiskL 



XieOKBUF 



-JUnP-'22-C 



(22) 



Ctest zero) 



f22) 



(_FLAG-ZER0) 



TITU 

FPII-F FLOWS 



(21) 
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FD 



FPII-F-2 



n 



rirty 



.CVJ 



OL 



-TMS n t AWg ta »» C» I CJ .T HJ i H HBMH mm THi 

nu P T i' or piOTM. tjjmmtr amtaucnm Aia 
»<«u. Mar If Mn i jw i o« gum o« \mo m wwoti 
a M Mar Ai n« ■*» >at THI MANuntfTuH a ktti 
cr rniM wmouT vntmM Nuusoi 
xTO|977iMirM.i 



(test zero) 



JiAi. 



8*< ie.4.2) 

X12*R0TL<XIB) 

junp-'aa-B 



:i<iL 



F*Xt2 
CLEAR PLftG 
BUT E2BT 
XinP^22-f 



FDST*0 



01 



00 



J^ 



22-e 



eUF*FPS 
BUT 0P1B 



-JUriP-'Sl-F 



_ik 



^ 



22-f 



BUF*fPS 
BUT 0P1B 



(23) 



( OPERATE ) 



CHK| CHANOtNa TlttV. 






(fLAG-ZERo) 



Jj^ 



<2i) 



22-C 



8«-< ie.s.2) 

><«2*«0TL<X18) 
JUnP^22-D 

1)44800 1 e . eeeee^ . 069082 



t402 



1 



22-0 



F*X12 

CLEAR FLAG 
BUT E2BT T8 

—junp^zz-F 

D**ERO 



SET UP INDEX CONSTANT 
LOAD XI2 WITH FDST 
ROTATED LEFT ONE PLACE 



TEST FOST FOR ZERONESS AND SIGN 
iNrTlLlZE FLAG 



FDST= 



IP 



^ 



^ 



:^ 



-21^ 



BUF«-FPS 
BUT OPIB 



NEG 



<- 



AEiS 



J^skL 



X11«-2ER0 
FCC«-0H< F2 > 
BUT FDST 



--JUnP/27-B 



\/ 



X1H-2ER0 
FCC«-0S<F2) 
BUT FDST 
jUnPyZ7-a 

o*-e000es 



jikL 



BUF»-FPS 
BUT FIUV 



I 



R1K-BX 
FEC«-IH 
SET FLAG 



-JUnP''2E-S 



TST 



^^^ 



F*X)0 
«JT ENBT 



E>*X10<B7:B6> 



Jill 



FCX*IH<FNF2) 
BUT FOST 



J^ 



FCC*a4( Ff y 
BUT FOST 



(27) 



C FDST MODES ) 



(24) 



(SPECIAL PEST ) 



lu. 



Q. 






FPil F FLOWS (223 



IweiT 25 0*40 



D FD 



FPii-F-2 



I I I I I 



■■■■'■ ■ 



wgT i V OWTM. igunraNT amaiATKH Mm 
>wu. NOT ■ MneeucB oi csnB « USD M moj 

OB M PMrr AS T>« lAairaK TMiWMWICTUli OK «IU 

« niM wnoff wmiM rawaBM. 

comuair 1 9 7 7M*'»<- iOU'MNr aawauT»r 



^-J-|ldd 






ABS 



1339 



23-A 



F1C»Fia 

E1««€ie.A»«.1?7 
JUtP''33-0 

DimCBO 



MAKE SIGN 
POSITIVE 



->r^ 



(operate) 



1336 



(22) 
NEG 



TST 



23-C 



Fi8*f le 

E1»)-E18.X0t.2ee 
BUT ENBT 
JUnP^23-0 

D4-H 



1*93 



COMPLEMENT 
SIGN 



-^ 



F»xie 

BUT ENBT 



(>4-Xie(B7:B6> 



-junp^e3-o 



TEST SIGN 
OF FDST 



-iil. 



svo 



• '♦93 



FCC*M 
8UT FOST 



D»2EK) 



-ajnP''2H-« 



r>-€ 



FCC*»t<FH> 
•UT FDST 



SET CONDITION 
CODES 



C24) 



(special dest) 



I CM 
IUl 

E 
u. 

E 

:0 



0«1 CH«H»Na I Ml/. 



^3r« , 



TITU 

FPI 



F FLOWS (23) 



26 0^40 



BZCCODf 

DFD 



FPIl-F-2 



acv. 

3 



I rw 



mu r mn or •wtm. § au mm; y ooanuTiOM amd 

MALL NOT M •VKBuae 0* CCr«B OB lOB M WCU 

01 M nurr Ai TMi lAsa ran T>« homwctuh o* wu 
orrnMi 



WOIVUT 

"0197 



r7"OT^ 



a-j-iidj 






(special pest) 



OM0 



OMI 



0M4 



0M2 



_N/_ 



I7H1 






-JUnP/'36-I 



:ik- 



BUT OPIB 



D4-X18<B7:B6> 



Jik. 



17HZ 



BUT OPIB 

--' 'I I- 

t»*RO-B 



(22-23J 



DM3 



THIS ROUTINE UPDATES THE INDEX REOISTERS 

AND THEN LOADS THE UPPER SIXTEEN BITS 

OF THE FDST INTO MEMORY OR ASi ACCUMULATOR 

AS THE CASE MAY 8£. NOTE THAT '-.£ TEST INSTRUC TJON 

AVOIDS DOING A MEMORY CYCLE SIHCE T S UNNECESSARY 

AND UNLAWFUL 

0M5 DM6 



DM7 



2H-a 



1^3 



RD«^tO+B 
BUT OPIB 

f- SRI L 

DHW>*B 



.JAI- 



2S-0 



nt>*ta>*z 

BUT OPIB 

— SRI L JUf1P^2H-U 

0*RD*2 



NEG 



::^ 



I7v« 



BUT OPIB 
SRI L — 
0*RO-2 



Sl/L 



BUT OPIB 



_iiiL 



PC«-PC*2 
BUT OPIB 



ASS 



TST 



::JLiL 



junP/2H-n 



2H-T 



1920 



FPS*euF 
BUT FLAG 



O+fiLF 



--junp-'2»i-M 



I3HI 



JiJ.!l. 



FPS4-8UF 
BUT FLAG 



0*BtF 



jsk- 



2H-fl 



I3H9 



MTO rWINT 

U0ATIHXIt(3> 
—BUT NOSERV-OUnP^l-A 



(rSERV ) 



Jii^ 



DATO riAINT 

U0ATA«-)(ie<3> 

junp^37-e 

D»XIB<B;':B6> 



( SERV ) 



(37) 



(trap-test) 



(37J 






Q. 

Li. 

go 



(trap/serv) 



CHK| OMNBINa 



TtTU 

FPf|-F FLOWS 



(24) 



BZEKOM 



FD 



270f 4C 



FPII-F-2 



I I I I I I I 



-JVI/ 



-TMi e«AW>S AMB VKVCATOA l«tlM. «M TM 

fw rr or OWTAL iqumwit ooiKiuTnN nm 

9«tU NOT « ranODUOD CM CO*^ 0* U9B M m«xi 
0* M PMrr AS na lAIS rOI TW MANUMCTUH 0* IM< 
OP mM wnWUT WBTTVt fVMODOK 

corr*w<T 1 977narrAi. •gumxT aaraATBH- 



z-j-iidi lajiai 2 I 

-5==! I IBM""! L 



OzD 



-^ 



29-A 



CLEAR FLAG 
BUT POST 



-JLrpyz?-B 



INITILIZE 
FLAG 



CSTCDF) 



^iLL 



XIK I8H2ER0 



D«^2ER0 



ZERO LOWER 
32 BITS OF AC 



^ 



j;AiL 



29-C 



FOfL*fOFLBA» 
CLEAR FLAG 
BUT FDST 



l>*2ER0 



-XTP^ZVE 



Jik- 



FEC*«2 



.U*»^V-A 



(27) 



(373 



(fdst mooes) 



C ILLEGAL ) 



COMPLEMENT fdfl Flops 

INITILIZE FLAG 
BREAKOUT ILLEGAL MODE' 



:^^ 



29-E 



B*< 18.H.2> 
Xia«-R0TL<X1I ) 
BUT ENBT 
junpyZ^-G 



SET UP INDEX CONSTANT 
ROTATE AC LEFT INTO Xl2 
TEST SIGN OF AC 



SET SIGN 
0*U 



JskL 



CLEAR SIGN 



XI©— SIGN 



1566 \ 


25-L 




9M 4, 29-H 








Fn*2€ftO 
E>>E12 
BUT E2BT 


8UF*- FPS 
-JUMP/25+l 






D4€I2:2ER0 


L 


1 EXP-128 








12*1 ^^ 25-1 





SSI ^^ 29-J 


X1l«-2eiH} 
FCC*«4<Fa) 
BUT FDST 


STORE ZERO 


FI2*^SR1(FI2> 
EI2«^2UO 


D»2Eli0iFI2<B6> 


D*B»BBB'l 




"' N 










^ 29-« 






Xt2«'S*»()(l2> 
TBUS-i- BVJF 
BUT FT 
__ JUMP/ 34 -H 

••mr 




(27) 






(34) 



XI3-EXP(AC) 
TEST EXPONENT 



INSERT HIDDEN BIT 
ZERO EXPONENT FIELD 



INSERT GUARD BIT 
TEST FT (FPS) 



Cfdst modes) 



<3« I CHANSi Na I m*. 






sQ 



«a-- 



FP(|-F FLOWS (25) 



uSEoS 



FO 



28 or 40 



FPll-F-2 
I I I I I I 



iw 



1 



leauBDMiwaj 
mMtcnmttMVU 

corruvrr O ^^f jeierM. mf j mm n aaKSATor 



OB W f««T At TM IrUa lO* TMI MANUWCniH WIMl 

"©197 



LJ*"^ 



^^-"^^^I{2 



(OVER/STC) 



?VERFLOW 
I 



1262 



(34) 



OK 




-^IjL 



TBUS*BUF 
BUT FIV 



ARE OVERfLOW 
INTERRUPTS ENABLED? 



iirs 



Jiii. 



1123 



xn«-2EIK) 
FCC*^e6< F2f V ) 
BUT FDST 



-JUnP/'2/-B 



STORE 
ZERO 



Jik: 



tES 



26-C 



FCCR^FCCR.OR.eZ 
SET FLftG 
XTP^Z^-D 

CM-eeee82 



l%2 



SET FV BIT 
FLAG POSSIBLE 
INTERRUPT 



SkL 



26-0 



FCC*FCC« 
D<^CCR 



-JUnP-'26-E 



Jili. 



Rn«-Bx 

FEC*ie 



SET FCC 



UPDATE FEA fRiii 
SET FEC TO 
INDICATE OVERFLOW 



-> 



STCFD AND STCOF ENTER THIS 
FLOW AFTER PASSING THROUGH 
ROUND/TRUNK. THE PROCESS OF 
ROUNDING CAN CAUSE AN OVERFLOW 
IN A VERY SMALL CLASS OF VERY LARGE 
NUMBERS DURING STCOF (PROBABILIT Y = 



00 



\/ 



1062 



I 



X11««0TiKXt2> 
BUT FDST 

~JUnP>'27-e 

0«-X12<B?:B6> 



ZJ 



!»TATE XI2 RIGHT AND 
STORE IN XII 



(27) 



5° 



(fdst modes) 



0«| OWMNg 



Tmf 

FPM-FFLOWS 



(26) 



29 Of 40 



FD 



FPII-F-2 



I I I I I I I 



TV/ 



1 



z-^.-"^^ lyai 2 1 



AnOMl MMK Mi 1M 



■iMtrMTM Mara* iM JWMMcnai 

V^DttUmMHTTM ff 

"©IS??""'* 



(fdst mooes) 



ILL EG 



OM0 



OMI 



0M4 



0M2 



J^ 



27 -ft 



16H8 



RIUBX 
rEC«-82 



-JUnP/37-A 



::ikL 



FPS*BUF 
BUT FD 



0*BUF 



-JUnP^27-0 



(37) 



(illegal) 



JbLL 



16t2 



RO+RO-B 

SRI L 

0*RO-B 



l&Hf 



JJ<1 



(21-22-25-26) 



0M3 



0M5 



DM6 



Jbld. 



27-L 



16H3 



»U»12«-R0 
FPS*Bir 

xnP''2;'-n 



1569 



Nk_ 



BA«^RO OAT I 

RIZHOATft 

FPS«-eUF 

ID SP'iCt JUnP^27-V 

D4-UDATA 



RO«-RO+B 
Ot-RO^B 



JUnPx27-L\. 



27-KK 



R12*R0 
FPS«-BUF 



-JUr*>''27-< 



J^ 



"T" 



JiiiL 



1646 



RO+RO-2 
FPS«-BUF 

sfti L xnp/27-x 

D*R0-2 



RO+RO+2 

SRI L JUnP^27-T 

CHRO+2 



27-LL 



RI2-RI2tl2 
MAINT 
BUT GR7 

JUMP/27-Q 

D *- R.11*-! 



tIftINT 
BUT GR7 



R12»RI2*2 



-JljnP/27-0 



JjA^ 



FSRC*X1 1 
BUT FLAG 



CH-)(1UB7:B6) 



Jik_ 



FSRC(32)*X1I 
BUT FLAG 



D«'Xn(B7:B6> 



Jbkl 



DATO HA I NT 

U0ATA4'X1U3> 
BUT FLAG 

JLTP-'V-H 

D4'X1i<B7:B6> 



Id^ 



27-00 



BA4-PC DAT I 

8«-UDATA 

FPS4-BUF 

- _t3P^cG JU*^27-EE 

DHDATA 



Jiil. 



BA*RO DAT I 
R12«-U0ATA 

ID SPACE Jl*1P''27-T 

D<-UDATA 



JNk_ 



BA+R12 RI2«-R12*2 
riAINT 

ID SPACE JLtV^Z^-Q 

0*R12*2 



-^ 







j^ 



27-0 



OATO mi NT 

UDATA<-X1K3> 

junp^a7-R 

D*xn(B7:B6) 



BA4-R12 Rt24-R12'»2 

MAINT 

BUT FO 

ID SPACE JUnP^27-S 

D«-RI2*2 



27-S 



OATO miNT 
UDATA4^Xn(2) 
BUT FLAG 
JUW/V-H 



(37) 

(trap/serv) 



JiAL. 



PC*PC*2 
0*PC+2 



JiiL. 



R12«-R0*B 



&*RO*B 



JbkL 



27-r 



OATO riAINT 
UDAT0«-X1U2> 
JUW27-Z 

0*X11(B9:8H) 



_ 



27-2 



BA«^^^2 ri2»ri2*2 

riAINT 

ID SPACE- JUnP^27-AA 

0^12*2 



3Z 



27-AA 



DATO rWINT 
UDATA«-X1KI > 
XrP^27-B6 

D«xn(B3:B2> 



I60< 



BA*«12 
riAINT 

ID SPACE JUW»^27-CC 

U*'Xia<B7:B6) 



1682 



— I — 



27-ce 



OATO HAINT 

lJDATA«-X1Ke> 
BUT FLAG 

Jl*f»^V-H 

O4-X1UB1:B0> 



0M7 



Jikl 



27-66 



BA4^>C DATI 

B4-U0ATA 

FPS««r 

i SPACE JUW>''27-HH 

O^UDATA 



I 



PC*PC+2 
0<^PC»2 



-JUHP/^27-11 



Jikl 



27-11 



R12«-RCKfl 
04«0«B 



-JUrf>/2?-JJ 



1V5 



JbkL 



27- JJ 



BA4«12 DATI 

R12*^UDATA 

I D S PAC e Jlf»>^27-T 

OnwATA 



icD 



CM 

!^ 

IS 



OK I 04Mat ML I MV. 



ax" 



TITU 

FPII-F FLOWS 



(27) 



ItHOT 30 or 40 



FD 



FPII-F-2 



TW 



r 



imwii c* sieTAt. ig u— rr a»m.i i ium Aie 

•MU. HOT ■ IVaaDUOB 0« CanD C* UnD M WMOU 
Oa M MJIT 01 TMI lUS Ka TMt IWNUMCTUli 01 WU 

or m«a wmour Mnunw pauxoMM. 

ccvTusHr Ot977 BtSTAL n u — i T canmATor 



~m^ 



i 



1 1 a I e-d-iidj loijaj 2 I 



(source modes) 



0M4 



0M2 



_^k 






— Jurr.'^3'5 



OK I CHANGf Na 



-.J 



(28) 



DM3 



QMS 



\i^ 



jvk 



-SRi L--- 
D*RO-B 



Kia.2ERG 

eiet-RO 



N'' 



-> 



RD*RD+B 
SRI L — 
D*-R0+8 



-JLinp/-28-D 



-ill. 



1404 



X12«-HER0 
R12*RD 



26-0 



OAT I 
B-UDATA BUf-UDATA 
BUT GR7 0R FLBAR 

JUMP/28-0 



-> 



LOAD BAND BUF 
WITH DATA 



Jikl 



OflTI 
B*UDflTfl,8UF*LIC«Tfl 
BUT GR'.OR.FLBRR 

junpyza-o 

D«-UDATA 



^ 



:iid_ 



X12<e)*BUF 
BUT OPtE 



UPON EXITING THIS FLOW 
XI2 LOOKS LIKE THIS: 



XI2 I g I A I B I g I FL-I 



Xt2 



I g I FL-2 



I I 

2 I 

J I L 



SECTOR 



A. FIRST WORD 
B>SECONO WORD 



LOFPS 



-iljl. 



FDFL,FPS-*-euF 

butmoserv 

dV buf" 



-JUMP/I-A 



UPDATE FDFL FLOPS 
BUF IS THE NEW FPS 



( SERV ) i^W-i) 



1673 



0M6 



Jd<iL 



Bf>*kO DAT I 

R12*-U0flT« 
--ID SPACfc---JUf1P>'28-n 
D<-UOATA 



t31'» 



JikL 



x)a»2Ei>o 

-SRI L- JUnP^28-S 

0*RO-a 



\l/ 



RO+RO+2 
X12*2ER0 

--SRi L JUnP^28-N 

D«-R0+2 



J^ 



Jik. 



9«»PC OfiTI 
-I SPACE- JUnP''28-U 



\/_ 



BA*RO DAT I 

R»2«-Ut»Tfl 

ID S PAC E JUf*'''28- 

D*UOflTfl 



_^k_ 



xt2«-2ER0 

PC*PC*2 



Ji^ 



0*«O*B 



Ba*R!2 DAT I 

8*UD<»TA BUF«-UOflTfl 
BUT FLBfiR 
--ID SPACE —- -JUnP'28-0 
04^U0ATA 



LOAD B AND BUF 
WITH DATA 



CHHrlD 



JikL 



X12<2>4'8UF 
R12«-RI2+2 



1620 



Jbk_ 



BUT OPIE 



-JUrP/'28-CC 



LDFPS 



\/_ 



BA*R12 OAT I 
BUF*^UOATA 

— ID S PAC E JUnP^28-0 

DHIOATA 



-^ 



JiiL 



28-CC 



I6»5 



B*2 CLEAR FDFL 
BUT DST 
JUMP^28-A 



LOEXP 



_^i:_ 



2B-DD 



B*-2 CLEAR FDFL 
BUT DST 
JUnP^28-A 



Xt2< t )*BUF 
BUT OPIE 



-JUr»»^28-B 



128) 
C SOURCE MODES) 



DM? 



1677 



i 



! eA4.PC DAT I 

i 8*l.iOATfl 

L- -I SPACE JUfiP/28-« 

0*UDATa 



<613 


vl/ se-K 


X12«-2ER0 
PC*PC*2 




D*PC*2 




IfelH 


28-r 


R12*RD+B I 


D*RO+B 


1 


1615 


1 


BA*H12 DAT I 
Rt2*UC>flTA 

—10 SPACE JUnP-'2e-N 

D*LjOATfl 



LOC 



se-EE 



B*<H.2> 
BUT OST 
XTPyZth-ti 



BUF AND B 
CONTAIN THE 
NEW EXPONENT 



A... CONTAINS 
THE INTEGER TO 
BE CONVERTED 



(29) 



C'-OEXP) 



SET UP INDEX CONSTANT 
AND FORCE A ONE WORD 
FETCH FOR LDFPS AND LDEXP 
BY CLEARING FOFL FLOPS. 



(30) 



CTo£3 



TITU 

FPfl-F FLOWS 



(28) 



31 W40 



FD 



NUMBfH 

FPII-F-2 



°!"-| I I I I I I I 






50 



MV. 

B 



I -V/V 



>«MX NOT M aVaoOUOB CK CCmB OK UOD 
0* M hUn- *I TW lASS W* TM MUNWACTUM 

OP rTUM wmouT vMirrm psMsaoN. 
CBrnsMrO^ osttai. (gumBff 



MO 

WHOU 
OtMJ 



'1977 



^-J-lldJ 



BslssL- 



(loexp) 



29-A 



B«« SUM 



D4-B siwe 



-junp/M-B 



JiliL 



XI2«-R0TL<xn ) 
JUnP/-29-E 

I>«-Xn<S7:B6> 



Jd^ 



F12+F12 
E12*B 



-JUnP^29-F 



F12*F12 
E12«-E 12+206 



D^iaeeea 



-JUnpy29-S 



LOAD NEW EXPONENT INTO XI0C3) FOB TEST IN 29-G 
SWAP BYTES OF NE* EXPONENT TO GET READY FOR Z9-E 



ROTATE AC RIGHT INTO XI2 



LOAD El2 WITH LOWER BYTE 
OF NEW EXPONENT 



PUT NEW EXPONENT INTO 
EXCESS 200 FORM 



Ni/ 



23-S 



F4-X12 

BUT E2BT T8 



D«-X12<B7:B8> 



«l 



1583 



M 



Jii^ 



29-C IMI 



FCC* 18 FCCRH8 
XrP^29-S 

o<-eee8ie 



TEST OLD SIGN AND 
NEW EXPONENT 



JiliL 



29-0 17t3 



Fcc+ee FccR<-8e 

JUnp^29-G 

D*2ER0 



29-0 



FCC*1H FCCR*14 
JUnP^29-G 

o^^eeeif 



SLl. 



FCC*9S FCCR*e4 
JUnP/29-S 

D<-eeeees 



SET FCC AND FCC5 



A. 



FDFL.BUFH4-FPS 

xie^-xte 

BUT EN8T E2BT XNBT 

JUnP^29-J 

D*FPS 



odi 



ii' 



J^ 



011 



29-H 1344 



Xie«-R0TR<X12) 
TBUS«-BUF 
BUT FIV 

JUPPyJ5-j 

0*BUF 



Jik. 



0W) 



JM 



f 



29-1 lie 



Xie*R0TR<X12) 
TBUS*BUF 
BUT FIV 

JUnP^35-J 

0*BUF 



CHK| owctNg Mv. 



Jsk_ 



29-j 1504 



Xie«-R0TR<X12) 
TBUS*«JF 
BUT FIV 

JU*>-'35-J 

D*BUF 



RESTORE FOFL AND 8UF WHH FPS 
TEST NEW EXPONENT 



\0\ 



«l« 



Jd<d. 



29-1. 



F*Xt8eAR 
BUT E2BT 

JUnP.'23-« 

04-X1BeA(i<B?:36> 



JJ^ 



F<-X12 
BUT E2BT 



CM-X12<B7:B6) 



-JUnP^29-0 



Xie*R0TR(X12) 
TBUS«-6UF 
BUT FIU 

jUnp^39-0 

D*flUF 



(35) 

(store overflow") 



::>kL 



29-M IW<4 



Xie*R0TR<Xt2) 
TBUS*8UF 
BUT FIU 

jUrpy-n-D 

0*BUF 



1*35) 

(store under flow) 



:i>kL 



29-0 r 



Xie<-R0TR(X12) 
BUT FD 

JUnP^36-D 

D»X12<B7:B6> 



Jik: 



icD 



J CM 

IlL 



a. 

Ll. 

E 



X1»H?0TR<X12) 
BUT FD 

XnP^36-0 

D*X12<B7:B6) 



!(36; 



(STORC Xl») 



TITU 

FPI 



-FLOWS f29) 



32 Of 40 



FD 



FPll-F-2 



•Mu. NOT M awDucB 0* cons 0* USD I 
e* M run n tm ims m tm HW«jp<tfTuii oi Ml 
or niM wTTKxiT YMUTTM nwuaioi 
corT»i»«TO|g7y Btmtft. K umm n cBimmArtar 



INTEGER IS MOST 
NEGATIVE NUMBER 

I -2'* OR 2-" 



CHK| CMAWgNg Tmv. 



C LDC ) 



C28) 



BUF*FPS 
0*FPS 



-JUf1P^3e-F 



SAVE FOS IN BUF 



THIS LOOP DOES AN EIGHT 
BIT LEFT SHIFT IN FOUR aCLES 
AND GETS MSB OF INTEGER wro 
MSB OF XI2 



(NEC) 



_:ikL 



SET 5I6N 



Jik. 



38-C 



junp.'3e-p 

0«-X12(B7:B6) 



f^72 



JiJ^ 



Ftxia 

OJT XNBT 



tHXiatB^iBg) 



1152 



XI0*SIGN (II 



COMPLEMENT 
INTEGER 



TEST SIGN 



Jd^ 



X124-SRWX12) 



04'X12(B7:B6) 



-JUt»>/'3e-E 



16'3« 



JiiiL 



»-€ 



RIH«-RIH>1 SUM 

junP/'3e-N 

0<-R1H+l SIMB 



INSERT GUARD BIT 



EXP— EXP + I 



^-"dJlGj|a(2| 



THIS LITTLE PROGRAM TAKES CARE 
OF LDCIF.I DCID, LOCLF, LDCLD 



li 



F«-XI2 
R I <♦«••♦ 
BUT XZBT 



D*BO0OO*1 



IIM 



SET UP ITERATION COUNT 
TEST XI2 FOR ZERONESS 



JiLL. 



X12*SL8e<X12) 
RIH4-R1H-) 
BUT 2BIT 

junpz-ie-G 

O^RIt-l 



jJ^ 



R1'»«-<23?.217) 
F«-XI2 
BUT XNBT 
JUnPx38-J 

0»eee237.Bee2i7 



SHIFT LEFT 
TWO PLACES 



EXP— (31 OR 15) 

TEST SIGN OF INTEGER 



\kL 



FCC«-8H(F2) 
BUT FD 



(36) 

(store zero) 



INTEGER IS ZERO 



(POSJ 



-iJ-d. 



CLEAR SI8N 



YES 



J^^kL 



F«-X12 
BUT T62 



0«-X12<B5:B6) 



-JUnP^38-L 



-X 



Jd^ 



X12*SLe<XI2) 
RI4*RIH-1 
BUT TGI 



-JUnP^38-L 



1265 



J^ 



38-0 1H65 



Rm»R1«t SUA8 



D4«tW SUAB 



1631 



-N]^ 



t^ - SIGN (I) 



IS HORMALIZATION NECESSARY ' 



SHIFT INTEGER LEFT 
•DECREMENT EXPONENT 
TEST PGR NORMALIZATION 



3«-n 



R144-R1S SUAB 



D4-R14 SUA6 



CM 



a. 

Ll. 



JlikL 



38-N 



X13*«t'« 
D««1H 



-junp^i7-j 



(17) 
(round/ TRUNK TEST) 



PUT EXPONENT IN 

PROPER HOLDING REGISTER 



FPfl-F- FLOWS (30) 



JSHSET 33 Of 40 



D FD FPII-F-2 



0,^ I I — I — I — I — I — I — r 
°, 1 I I I I I I u 



TVl/ 



-TMS OWWINS Mm J W OO TOg, I —HI . MK TW 
WKWr i 0> MOTAi. igu— IT 

stDu. mr K «■ i«jriui:».i tm cons 

OK W MJCT AS Tia M« lOr THi 

OF mxs wnwwr tniTTw patMOinK 

oamiicMT 1 9 7 7eiaTAt. Mi*M*<r oowouanr 



STEXP 



J5A1- 



F13*2ER0 
En«-E11 
CLEAR FDFL 
JUnP^ll -B 



J^lL. 



31 B 



X13»X 13-208 



-JUnP^31-EE 



JiL:!. 



31 -EE 



F«-X13 
BUT ENBT 



I>*XI3<B7:B6) 



-JUnP/3t-0 



-iikl 



R10«-X13 SUAe 
J 

OX13<Be:B7) 



-JUnP^33HC 



NJ^ 



RI04-X13 SUM 
BUT EZST 



l>*'X13<Be:B?) 



-XinP^31-E 



1272 



FCc»ee 

D^ZERO 



-JljnP/33-K 



JJd. 



3«-« 



FCC*«H<F2) 



-JUr*>/33-< 



Z-i-lldJ 



BBIBS, 



1774 



Nk 



31-66 



BUF<-FPS 



■J UMP/31-G 



EXP < « 



V I EXP=3 



1266 



Jil 



BX«-?ERO 
FCC«-eH<F2) 



D^-ZERO 



-JtrP^33-8 B 



(33) 



(aTFcc) 



cwKt CMAHatMa Tmv. 



«3r- 



(stcdi-stcdl) 



-> 



(STCFI-STCFJ^ 



Jd<^ 



xnciax-ZERO 



0*2ERO 



^^ 



xn*R0TL<X11 ) 
FCC*18<FN) 
R10»2ERO 
CLEAR FLAG 
BUT 0P1D 

JUnP/'31-H 

D«-2ER0 



-iifi. 



FIKSRKFII ) 
E11«-En 
BUT ENBT 

JUnP^31 -F 

tX-En:Fn(B6) 



SLL. 



F13*2ER0 
E13«-En .XOR.?W 
BUT E2BT 
JUnP^31 -J 

Dfieeeee 



j:AC 



X13*(37.i7>-X13 
JUnP^31 -C» 

D'^ai?t0e.0e7iee 



Jilil 



31-00 



F«-X13 
BUT ENBT 



D*XI3<B7:B6) 



-JUrt>^31-S 



l:ik_ 



R1H*X13 SUA6 

JUnP^31 -K 

0»XI3<Be:B7) 



IBTfl 



i 



xn^SRMxn ) 

RIHvRIH-l 
BUT NBIT 
t JUnP/'3t -K 



JiliL 



31 -L 



B^XIUH) SUAB 

junR/'3i -n 

O^XIKBeiB?) 



1632 



31 



31-M 



BXi-XIKL) SUAS 
F*EAC 
BUT ENBT 
JUnP^32-J 

0«XI1(B^:83) 



(32) 



(neg/pos) 



-xrp^3i-s 



INTEGER OVERFLOW EXCEPT 
FOB MOST NEGA-^IVE INTEGER 



EXP>3I/I5 



JiAi. 



B^XIKH) SUAB 

F*EAC 

BUT ENBT 

JUnP^31-fl8 

0«-X11(B6:B5> 



STORE HIGH PART OF INTEGER 
TEST SIGN OF INTEGER 



INTEGER POSITIVE 



-iikL. 



1892 



X13*X13*1 

JUnp^31 -FF 

D<-X13*1<B7:B6) 



13?? 



JZ 



3I-FF 



.2^ 



TBUS*«JF 
BUT FIC 



D*BUF 



-JUnP^32-N 



F«-X13 
BUT E2BT 



D*X13<B7-.B6> 



-XinP>'31-AA 



-^ 



EX? > 32/16 



1166 



Rm«-Bx 

BUT FL 



D*BX 



16« 



SAVE 8X 
IN RI4 



:ikL 



TBUS«-BUF 
BUT FIC 



D*8UF 



-JUnP^32-N 



J^H. 



BX«-X1KL> SUAB 

JUnP-'31 -X 

D*X1U8H:B3> 



JikL 



31-X 



BX4-R13-BX 
BUT C0UT15 



0+R1O-BX 



-JUnP^31-T 



RESTORE 
8X 



J^il 



1691 



\^ 



JiA£_ 



31 -Z 



R10*R1«-B 
BUT NBIT 



0««1<!>-B 



JW*»^31-T 



31 -T 



BX4-R1H 
TBUS*BUF 
BUT FIC 



-JUnP^32-N 



f32) 



(CONVT test) 



\/ 



(cONVT test) 



THIS CODE TESTS FOR 
MOST NEGATIVE INTEGER. 
NOTE THAT HI7 IS INITIALLY 
ZERO. 



(33) 



(CC'-FCC) 



Tirui 

FPII-FFLOWS C3I) 



ll2E|C0Of 

FO 



00 



go 



FPM-F-2 



-*■ |WBT 340» 40 |d|IT.| I I I If 

2 I -n-' 1 



I 1 'ffi I assL ImTnl I 



-THS OMWIME A>C VKWCATaa, HBCM. AM TM 

nnmTY » dwtm lOuvMiMT cowoaATiaN amd 

BWJ. HOT M UnKBUCIO 0> COMD Oa U>0 IN WWLf 
0* M MUT AS TW tAIB KS TM MAMIMCTUM C* lAU 

V rriMi wineur «hutt«4 mMimcM. 



UPON ENTERING THIS BOUTTNE , THE INTEGER 
IS IN B AND BX, R|7 CONTAINS ZIRO. 
THE INTEGER IS COMPLEMENTED CIF NECESSARY) 
AND STORED IN RI7 ANO BX. 



(STFPS) 



FORCE A ONE WORD 
STORE BY CLEARING 
FDFL FLOPS 



FETCH FPS 



MASK OUT 
UNUSED BITS 



CEijD 



JikL 



CLEAR FDFL 
CLEAR FLAG 



- JUnP'32- P 



CMC I CMANGi NO. UV. 



1H3I 



(CONVT test) 
C3i) 



(neg/pos) 



32-C 



CLEAR FLAG 



\1/ 



SLL. 



Riex-FEC 
D«-FEC 



FPS*FPS.AH0.1H77V 

JUnP^32-8 

D*FPS 



Jik 



JiLl. 



SET FDFL 



-JUnP^32-Q 



R10*FPS 
BUT OST 



-JUnP''33-A 



I54|!{ 



FETCH FPS 



STORE FEC 



STORE FEA 



32-a 



tB-«-4 
|_BUT DST 



-J UMP/33-A 



{33J 



(pest mooes) 







j(3i) 











1473 ^^ 32-F 




873 ^ 32-J 


BUT FL 


-JUnp/32-I 




FCC*« 
R10*« 






t>4« 



















1275 \^ 32-€ 








BX«^R10-BX 
BUT C0UTI5 






D«-RI -BX 








'- 





IBTt ^^ 32-H 


27V ^^ 32-1 






R10*^B8AR 




RlO*RW-B 


r»/'33-SB 






D««8AR 


D<H»10-B 






















(33) 











nt"! 



-^Jiil. 



Rt 1«^BX 
SET FLAG 
FEC»86 



I><«X 



-JljnP^32-H 



UPDATE FEAiRii) 
FLAG INTERRUPTS 
SET FEC 



JiL- 



32-N 



Rl^t-ZERO 
FCC*«< F2FC ) 



-JUnP^33-BB 



ZERO INTEGER (BX,RI7) 
SET FCC (FC INDICATES CONVERSION 
FAILURE) 



(33) 



(CC^FCCTT) 



(CC-FCC4.2 J 



•nrii 

FPM-F-FLOWS 



RZCEOOf 



(32) 



3SW 40 



D FD 



FPII-F-2 



f-n MM 



TVU 



!^ 



so 



> »(CnCATO« >«aM, AM IMi 

HMT i V oaiTAL tf un m tt eawawnaN «•• 

c* w Mirr At TM MM rai TMi iwNUMCTUM at s«u 

9 nrnc wiTMur wtfTTw nuMaoH 

comMHr 1 9 7 7n*<'Ai. «UM<MT coMaAinr 



2-J-lldJ fGJiaj 2 I 



Q:C<-FCC4-2 ^ 
, ^ s^ 3 3-B B 



(pest mooes) 

(32) 



<4-23 



-JUMP/35*< 



OM0 



OMI 



DM4 



I7t* 



33-« 



1711 



RD»«10 
BUT f L«6 



0*tt\0 



-Jur»^V-H 



n-m 



R124«D 
0*«0 



-JUnP^33-E 



1901 



f 3 1-32 J 



n-* 



FP&»fUF cc«-auF 

•IT OST 

junp/3>-« 



0M2 



SL!L 



33-8 



1712 



R04-R0-B 
SRI L 



0»«)-8 



-JUr»»^33-D 



0M3 



DM5 



DM6 



JiJd. 



33-« 



BA^12*R0 



-junp^n-i 



1731 



-iAl. 



BUT GR7.0R.FL8AR 
"SRI L— XrP^33-J 



_ik_ 



13« 



R12»«0 



--JUnP/'33-E 



33-J 



Rl2*Rl2t2 
MAINT 
BuTGR7©^ FLBAR 

--J UMP/33-g 



1357 



33-€ 



R12««12«2 
rwiNT 

BUT Ge7.M.FLBM 

JUnP/'33-0 

D*fi12*2 



1HI7 



r>-« 



OATO tWINT 
UOATA«R10 
BUT FLAG 
JU*»^V-H 



1713 



JiliiL 



33-L 



1715 



BA«-m MTI 

B12*U0«»Tft 

-10 SPACE— JUf*»''33-n 
0*UD«Tft 



16^1 



-^ 



JikL 



33-« 



1716 



-SRI L— - 
0*R0-2 



■JUTpyJ-i-S 



ROt RDt2 

_-SFil L JUnP^33-N 

£HR0*2 



-ik: 



33-+I 



HA4-RI2 R12*Rl2-»2 

nAINT 

8UT FLBOR 

-ID SPACE JUnP-'33-0 

OR 12*2 



i. 



33-0 



OATO rWINT 
tJDATA«-R1C 
JUnP^33-P 



\M{ 



J^iL. 



tM«-R12 
riAIMT 
-ID SPACE — JUnP^33-0 
D»Xie(87:B6> 



I 



n-« 



DATO riAINT 
U0ATA4-BX 
BUT FLAG 
-- JUnP^V-H 



C37) 



(TRAP/SERv) 



N/_ 



BA«^»C DATl 
B*iJDATft 

—I SPACE JUnP-'33-U 

D«iJDATA 



J:Al. 



1653 



BA+Rt> DAT I 

R12*UDATi» 

-ID SPACE JUnP''33-H 

D4-U0ATA 



Ji>kL 



PC*PC*2 
Orf>C*2 



-junp/'33-v 



_^jld. 



Rl24-R0>e 
D*fiO*B 



-JUnp-'33-N 



THIS ROUTP^E STORES A SINGLE OR DOUBLE 
16- BIT WORD DEPENDING ON THE Ft FLOP. 
A SINGLE WORD IS ALWAYS STORED IF IN 
IMMEDIATE MODE. 



DM 7 



1717 



Jiv- 



BA*PC OATI 

8MJDATA 

— I SPACE --ju»<n-x 

OHDATA 



-iAl. 



PC»PC+2 
C>*PC*2 



J^ 



R12*R0*B 
D*fiO*S 



.2JidL 



9AH112 OATI 

R12*U0ATfl 
-ID SPACE --JinP-'33-H 
0«UDATA 



!~ 



CL 
U. 

Sll 



CMK| CMAMgHg 



TITU 

FPII-F FLOWS 



(33) 



BziEaoi 



FD 



(HOT 360^40 



FPll-F-2 



B 



•nv 



TW 



01 M M«T M na tua pon TMi MANijncnai OK SAU 



o> nam WOMUT wuTTM K 
cornusKT 1 9 7 7 ocmL 



11 



Z-J'ildd 



Gja 2 



ROUND 
FT-d 



(round/trumk) 



17-11-14 17-18-25) 



TRUNK 
FT = I 



JikL 



X1H«-2ER0 
BUT FD 



Jbki 



3H-B 



xisoHHoeee 



D«-eseeee 



-JUnP/'3H-D 



:ikL 



xm< 1 itseeee 



1663 



ROUND 
XI2 



DECREMENT EXPONENT TO 
REFLECT INSIPID LEFT SHIFT 



THIS PUTS A 'ROUNDING BIT'IN 
XI4(6)0R XI4(38) DEPENDING ON 
FO BEING ONE OR ZERO. IN EFFECT. 
Xr4 BECOMES A ROUNDING CONSTANT 



X124-XI2-fX1H 

JUnp/'3H-P 

0«-X12+X1H<B7:B6) 



F4-X12 
BUT XNBT 



D«-X12(a7:B6> 



-JUnP^j 



DID GUARD BIT 
GET FILLED ? 



YES 



NO 



^bk- 



3M-E 



Xt3«-X13+I 

JUriP^3H-G 

D<-X13+UB7:B6) 



:J<^ 



X12«-SL9<X)2> 



D«-X12<B7:B6) 



DUMP GUARD BIT 



_^kL 



F12*SL0<F12) 
E12«-E13 
BUT E2BT 

1. JUt1p/3S-H 

D«-E13:F12<B6) 



J^ 



DUMP HIDDEN BIT 
INSERT EXPONENT 
TEST FOR ZERONESS 



Ft2*FI2.0R.Fie 

EI2«-E12 

BUT T8 

,AjnP/3H-J 

D4'F12.0R.F18<81:Be> 



JiJLil 



_^ld. 



F12«-Fi2.0R.Fie 

E12*E12 

BUT T8 

— Xinp/3H-0 

O^F12.0R.Fie<8i:Ba> 



1251 



FCC* 19 FCCR<-18 
BUT OPIC 
junpy3«,_li; 

oeeeeie 



:^kL 



3«»-J 



1737 



Fcc«-ee FccR'-ae 

BUT OPlC 

jUnp/3H-K 

D*ZERO 



INSERT SIGN 
TEST SIGN 



J±L 



1735 



FCC* 14 FCCR*1H 
BUT OPIC 
jUnP^TH-K 



ALL OTHERS 



N/ 



Jsk- 



FCC*0H FCCR*e»» 
BUT OPIC 

jurpyjh-K 

D«-eeeee4 



SET FCC 
AND FCCR 



STC 



F«-X13 

BUT EZBT T9 T8 

—JUMP -'35-1. 

O*X13<B7:B0) 



3H-L 



F*X13 
BUT E2BT 



(>4-X13<B7:B6> 



(35) 
C UNDER/OVER) 



(26) 



C OVER/STC ) 



las 



a 
u. 

E 

go 



CMC I CHANSC Na I RC^. 



TITU 

FPII-F-FLOWS 



(34) 



|»«T 37 or 40 



FD 



TrW 



FPil-F-2 
I I I I I 



n 



-TMB ai AWX MS »«C«ICATiaNl f«UIN, AM TM 

»m>ur i' OP owTM. tguMMNT qj w uw m i we 
avtLMBtm imt nu:m ai tami ai um t wxat 

d* M rMT AS T»€ t*aa K* THf MAMinKTUM 0* kttl 

iTiMS wroouT WHTTm rawnBOK 
corrtviT O bmtm. iQui m Bi r oowoiatiow 

1977 



^ 



911 



lea 



Jil:!. 



UNDERFLOW 
3S-0 1 331 



Xie*R0TR(X12) 
TBUS*BUF 
BUT FIU 

JUnP^35-D 

D«-8UF 



JiikL 



Xie»R0TR<X12> 
TBUS*BUF 
BUT FIU 

JUnP-'35-D 

D*BUF 



(STOftE UNQgR flow) 
1(29) 



^^ 



n-* I91S 



R 1 1 »BX 

FEcua 

BUT FD 



(36) 



(STOftg Xl$ TRAP ) 



Jil^ 



FCC«-eH< FH ) 
BUT FD 



(36) 



(STORE ZERd ) 






TJTTdJlSdfa] 2 I 

-fe=s SslaaJLi 



Cunoer/over) 



Ml 



f34) 



Jtl 



JiLl. 



OVERFLOW 
39-E 1.133 



Xie*R0TR<X12) 
T8US«-BUF 
BUT FIV 

junp/3«j-j 

0*BUF 



0«<> 



Jd«^ 



35-1 



XI0*ROTR<X12) 
TBUS*auF 
BUT FIV 

JUnP/35-J 

D«-BUF 



(store OVER flow) 



(2») 



-^ 



Xie*fiOTR<X12> 
BUT FO 

JUnP/-36-0 

C>4-X12<B;':B6) 



ROTATE RESULTS 
INTO XI4 



jAl 



35-F I 116 



FCCR'FCCR.OR.K 
JUnP/3?-G 



^^ 



FCC*FCCR 
tHFCCR 



Jili. 



Rtl4-BX 
FEC*1» 
BUT FO 



(36) 



(STORE Xl9 TRAP) 



Jd«^ 



FCC*e6< FZFV ) 
BUT FO 



(36) 



(store ZERCJ ) 



(36) 



(store xk) 



Jcc 



i::: 



12 



CMK I CHANGINa ImV. 



TITU 

FPII-F-FLOWS 



(35) 



|BMT IJOe 40 



HZICOOI 



FD 



FPII-F-2 



MV. 

B 



J_i 



rvv 
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(SET FCC) 



ENBT = I 



(812-13) 



ENBT-0 



JiikL 



FCC«-10<FN) 
— JUMP/3<3-I 

o<-eeeeie 



JiH. 



Fcc«-ee 

-JUMP/3frI 
0«-ZERO 






1276 




36-1 


FPS>«-BUP 


-JUMP/I-A- 








{ SEP 


^ 


) 



CHK I CMANSi Na «V. 



(STORE Xlg) 



FD=l 



Jild 



(629-35) 



FD=0 



1H22 



AC4-Xie 
■- JUMP/36-1 - 



JJ^ 



- JUMP/36-1 
t>«-Xie<B7:S6> 



(store XI0 trap) 



FD = I 



1427 



(35) 



FO<0 



Jid. 
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